<!--#include file="GetDB.inc" -->
<%

Set Conn = Server.CreateObject("ADODB.Connection")
OpenDBConn Conn, "board.mdb"
Set RS = Server.CreateObject("ADODB.RecordSet")

SQL = "SELECT * FROM Users where suser='" + session("buser") + "'"
RS.Open SQL, Conn, 1, 2
if not RS.EOF then
session("del") = RS("idel")
end if
RS.Close
Conn.Close            
if session("buser") = "" then
	Response.write("<script>top.location.href='login.asp';</script>")
end if
%>